home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software USA 5 #5
/
Software USA Volume 5.05.iso
/
pc
/
homeoff
/
zilch
/
run
/
zilchs21.exe
/
0
/
RCDATA
/
TFRMNEWZILCHIT
/
TFRMNEWZILCHIT.txt
Wrap
Text File
|
1999-01-29
|
42KB
|
1,579 lines
object FrmNewZilchIt: TFrmNewZilchIt
Left = 303
Top = 178
Width = 640
Height = 480
Ctl3D = False
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Position = poScreenCenter
PrintScale = poPrintToFit
OnActivate = FormActivate
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object Gauge1: TGauge
Left = 236
Top = 168
Width = 200
Height = 16
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ForeColor = 4194304
ParentFont = False
Progress = 0
Visible = False
end
object LabelStrategy: TLabel
Left = 289
Top = 191
Width = 88
Height = 13
Caption = 'Payoff Strategy'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object PaintBox1: TPaintBox
Left = 4
Top = 256
Width = 162
Height = 148
end
object Panel8: TPanel
Left = 175
Top = 260
Width = 280
Height = 134
BevelOuter = bvNone
Color = clBlack
TabOrder = 11
end
object Panel2: TPanel
Left = 476
Top = 193
Width = 146
Height = 201
BevelOuter = bvNone
Caption = 'Panel2'
Color = clBlack
TabOrder = 9
end
object Panel1: TPanel
Left = 14
Top = 12
Width = 196
Height = 207
BevelOuter = bvNone
Color = clBlack
TabOrder = 7
end
object Panel5: TPanel
Left = 427
Top = 11
Width = 196
Height = 151
BevelOuter = bvNone
Color = clBlack
TabOrder = 6
end
object Panel4: TPanel
Left = 221
Top = 11
Width = 196
Height = 151
BevelOuter = bvNone
Color = clBlack
TabOrder = 5
end
object CDS_Panel: TPanel
Left = 11
Top = 9
Width = 196
Height = 207
BevelInner = bvRaised
BorderStyle = bsSingle
Color = 5263440
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 0
object CDSImage: TImage
Left = 2
Top = 2
Width = 190
Height = 201
Align = alClient
end
object CDS_Label8: TLabel
Left = 7
Top = 186
Width = 82
Height = 13
Caption = 'Pmts + Pledge'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Label7: TLabel
Left = 7
Top = 158
Width = 81
Height = 13
Caption = 'Pledge Money'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Label6: TLabel
Left = 7
Top = 130
Width = 55
Height = 13
Caption = 'Payments'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Label5: TLabel
Left = 7
Top = 112
Width = 47
Height = 13
Caption = 'Balance'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Label4: TLabel
Left = 7
Top = 84
Width = 48
Height = 13
Caption = 'Strategy'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Label3: TLabel
Left = 7
Top = 66
Width = 26
Height = 13
Caption = 'Plan'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Label2: TLabel
Left = 7
Top = 48
Width = 67
Height = 13
Caption = 'Start Month'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CSD_Label1: TLabel
Left = 7
Top = 30
Width = 73
Height = 13
Caption = 'No. of Debts'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object CDS_Bevel1: TBevel
Left = 2
Top = 102
Width = 196
Height = 7
Shape = bsTopLine
end
object CDS_Bevel2: TBevel
Left = 2
Top = 148
Width = 196
Height = 7
Shape = bsTopLine
end
object CDS_Bevel3: TBevel
Left = 2
Top = 176
Width = 195
Height = 7
Shape = bsTopLine
end
object CDS_Title: TPanel
Left = 6
Top = 6
Width = 180
Height = 17
BevelInner = bvLowered
Caption = 'Complete Debt Summary'
Color = clWhite
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 0
end
object CDS_PmtsPlusPledge: TPanel
Left = 108
Top = 183
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 8
end
object CDS_PledgeMoney: TPanel
Left = 108
Top = 155
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 7
end
object CDS_Payments: TPanel
Left = 108
Top = 127
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 6
end
object CDS_Balance: TPanel
Left = 108
Top = 109
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 5
end
object CDS_Strategy: TPanel
Left = 108
Top = 81
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 4
end
object CDS_Plan: TPanel
Left = 108
Top = 63
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 3
end
object CDS_NoOfDebts: TPanel
Left = 108
Top = 27
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 1
end
object CDS_StartMonth: TPanel
Left = 108
Top = 45
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
end
end
object FPP_Panel: TPanel
Left = 424
Top = 8
Width = 196
Height = 151
BevelInner = bvRaised
BorderStyle = bsSingle
Color = clTeal
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
object FPPImage: TImage
Left = 2
Top = 2
Width = 190
Height = 145
Align = alClient
end
object MPP_Label4: TLabel
Left = 7
Top = 84
Width = 71
Height = 13
Caption = 'Total Money'
Transparent = True
end
object MPP_Label3: TLabel
Left = 7
Top = 66
Width = 77
Height = 13
Caption = 'Total Interest'
Transparent = True
end
object MPP_Label2: TLabel
Left = 7
Top = 48
Width = 97
Height = 13
Caption = 'Months Required'
Transparent = True
end
object MPP_Label1: TLabel
Left = 7
Top = 30
Width = 88
Height = 13
Caption = 'Debt Free Date'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MPP_Label5: TLabel
Left = 7
Top = 110
Width = 87
Height = 13
Caption = 'Money Saved *'
Transparent = True
end
object MPP_Label6: TLabel
Left = 7
Top = 128
Width = 77
Height = 13
Caption = 'Time Saved *'
Transparent = True
end
object MPP_Label7: TLabel
Left = 97
Top = 128
Width = 10
Height = 13
Caption = 'Yr'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object MPP_Label8: TLabel
Left = 148
Top = 128
Width = 15
Height = 13
Caption = 'Mo'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object MPP_Bevel1: TBevel
Left = 1
Top = 101
Width = 224
Height = 7
Shape = bsTopLine
end
object MPP_Title: TPanel
Left = 8
Top = 6
Width = 180
Height = 17
BevelInner = bvLowered
Caption = 'Accelerated Payoff Method'
Color = clWhite
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 0
end
object FPP_DebtFreeDate: TPanel
Left = 110
Top = 27
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 1
end
object FPP_MonthsRequired: TPanel
Left = 110
Top = 45
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
end
object FPP_InterestPaid: TPanel
Left = 110
Top = 63
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 3
end
object FPP_MoneyPaid: TPanel
Left = 110
Top = 81
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 4
end
object FPP_MoneySaved: TPanel
Left = 110
Top = 107
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 5
end
object FPP_YrSaved: TPanel
Left = 110
Top = 125
Width = 29
Height = 18
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 6
end
object FPP_MoSaved: TPanel
Left = 166
Top = 125
Width = 22
Height = 18
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 7
end
end
object MP_Panel: TPanel
Left = 218
Top = 8
Width = 196
Height = 151
BevelInner = bvRaised
BorderStyle = bsSingle
Color = clMaroon
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object MPImage: TImage
Left = 2
Top = 2
Width = 190
Height = 145
Align = alClient
end
object MP_Label7: TLabel
Left = 7
Top = 84
Width = 71
Height = 13
Caption = 'Total Money'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MP_Label6: TLabel
Left = 7
Top = 66
Width = 77
Height = 13
Caption = 'Total Interest'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MP_Label2: TLabel
Left = 7
Top = 48
Width = 97
Height = 13
Caption = 'Months Required'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MP_Label1: TLabel
Left = 7
Top = 30
Width = 88
Height = 13
Caption = 'Debt Free Date'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object MP_Label3: TLabel
Left = 7
Top = 127
Width = 83
Height = 13
Caption = 'Time Required'
Transparent = True
end
object MP_Label4: TLabel
Left = 97
Top = 127
Width = 10
Height = 13
Caption = 'Yr'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label3: TLabel
Left = 148
Top = 128
Width = 15
Height = 13
Caption = 'Mo'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object MP_Title: TPanel
Left = 8
Top = 6
Width = 180
Height = 17
BevelInner = bvLowered
Caption = 'Normal Payoff Method'
Color = clWhite
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 0
end
object MP_DebtFreeDate: TPanel
Left = 110
Top = 27
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 1
end
object MP_MonthsRequired: TPanel
Left = 110
Top = 45
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
end
object MP_InterestPaid: TPanel
Left = 110
Top = 63
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 5
end
object MP_MoneyPaid: TPanel
Left = 110
Top = 81
Width = 78
Height = 18
Alignment = taRightJustify
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 6
end
object MP_Yr: TPanel
Left = 110
Top = 124
Width = 29
Height = 18
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 3
end
object MP_Mo: TPanel
Left = 166
Top = 124
Width = 22
Height = 18
BevelInner = bvLowered
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 4
end
end
object btnHelp: TBitBtn
Left = 104
Top = 406
Width = 77
Height = 27
Hint = 'Click here for help'
Caption = 'Help'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
TabStop = False
OnClick = btnHelpClick
Kind = bkHelp
Margin = 0
Spacing = -1
end
object btnDone: TBitBtn
Left = 15
Top = 406
Width = 77
Height = 27
Hint = 'Click to go back to the main screen'
Cancel = True
Caption = 'Go back'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
TabStop = False
OnClick = btnDoneClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
Margin = 0
NumGlyphs = 2
Spacing = -1
end
object Chart1: TChart
Left = 473
Top = 190
Width = 146
Height = 201
AllowPanning = pmNone
AllowZoom = False
BottomWall.Color = clWhite
BottomWall.Size = 3
Foot.Font.Charset = DEFAULT_CHARSET
Foot.Font.Color = clRed
Foot.Font.Height = -11
Foot.Font.Name = 'Arial'
Foot.Font.Style = [fsItalic]
Gradient.EndColor = 8563455
Gradient.StartColor = 7733247
Gradient.Visible = True
LeftWall.Brush.Color = 8404992
LeftWall.Color = clWhite
LeftWall.Size = 3
MarginRight = 8
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -11
Title.Font.Name = 'Arial'
Title.Font.Style = [fsBold]
Title.Text.Strings = (
'Length in Months')
BottomAxis.Axis.Color = clGray
BottomAxis.Axis.Width = 1
BottomAxis.Grid.Visible = False
BottomAxis.Increment = 1.000000000000000000
BottomAxis.LabelsFont.Charset = DEFAULT_CHARSET
BottomAxis.LabelsFont.Color = clBlack
BottomAxis.LabelsFont.Height = -11
BottomAxis.LabelsFont.Name = 'Arial'
BottomAxis.LabelsFont.Style = [fsBold]
BottomAxis.MinorTickCount = 8
BottomAxis.MinorTicks.Color = clWhite
BottomAxis.MinorTicks.Visible = False
BottomAxis.Ticks.Color = clBlack
BottomAxis.ExactDateTime = False
Chart3DPercent = 26
ClipPoints = False
Frame.Color = clWhite
Frame.Visible = False
LeftAxis.Axis.Color = clGray
LeftAxis.Axis.Width = 1
LeftAxis.Grid.Visible = False
LeftAxis.Increment = 1.000000000000000000
LeftAxis.MinorTickCount = 2
LeftAxis.MinorTicks.Color = clBlack
LeftAxis.TickLength = 5
LeftAxis.Ticks.Color = clBlack
LeftAxis.TicksInner.Visible = False
LeftAxis.Title.Font.Charset = DEFAULT_CHARSET
LeftAxis.Title.Font.Color = clWhite
LeftAxis.Title.Font.Height = -11
LeftAxis.Title.Font.Name = 'Arial'
LeftAxis.Title.Font.Style = [fsBold]
LeftAxis.ExactDateTime = False
LeftAxis.TickOnLabelsOnly = False
Legend.Alignment = laBottom
Legend.LegendStyle = lsValues
Legend.ResizeChart = False
Legend.TextStyle = ltsXValue
Legend.Visible = False
MaxPointsPerPage = 2
RightAxis.Axis.Color = clGray
RightAxis.Axis.Width = 1
RightAxis.Grid.Visible = False
RightAxis.MinorTickCount = 0
RightAxis.Ticks.Color = clWhite
RightAxis.Visible = False
BevelInner = bvRaised
BorderStyle = bsSingle
Color = clSilver
TabOrder = 8
object Series1: TBarSeries
ColorEachPoint = True
Marks.ArrowLength = 3
Marks.Frame.Color = 14707
Marks.Style = smsValue
Marks.Visible = True
SeriesColor = clRed
XValues.DateTime = False
XValues.Name = 'X'
XValues.Multiplier = 1.000000000000000000
XValues.Order = loAscending
YValues.DateTime = False
YValues.Name = 'Bar'
YValues.Multiplier = 1.000000000000000000
YValues.Order = loNone
end
end
object PledgePanel: TPanel
Tag = 1
Left = 172
Top = 257
Width = 280
Height = 134
BevelInner = bvRaised
BorderStyle = bsSingle
Color = clTeal
Ctl3D = False
ParentCtl3D = False
TabOrder = 10
object PledgeImage: TImage
Left = 2
Top = 2
Width = 274
Height = 128
Align = alClient
end
object FutureMonthsLabel: TLabel
Left = 83
Top = 80
Width = 106
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'months from now or by'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object RB1Label1: TLabel
Left = 28
Top = 8
Width = 229
Height = 13
AutoSize = False
Caption = 'Use Original Pledge Money of'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
OnClick = RButton1Click
end
object RB2Label1: TLabel
Left = 28
Top = 32
Width = 120
Height = 13
Caption = 'Change Pledge Money to'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
OnClick = RButton2Click
end
object RB3Label1: TLabel
Left = 28
Top = 57
Width = 235
Height = 13
Caption = 'Pledge Money based on a future debt free date of'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
OnClick = RButton3Click
end
object RButton1: TRadioButton
Left = 8
Top = 8
Width = 13
Height = 13
Alignment = taLeftJustify
Checked = True
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
TabStop = True
OnClick = RButton1Click
end
object RButton2: TRadioButton
Left = 8
Top = 32
Width = 13
Height = 13
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = RButton2Click
end
object RButton3: TRadioButton
Left = 8
Top = 57
Width = 13
Height = 13
Ctl3D = True
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 2
OnClick = RButton3Click
end
object FutureMonths: TPanel
Left = 29
Top = 78
Width = 30
Height = 20
BevelInner = bvLowered
Caption = '150'
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 3
end
object MonthCounter: TUpDown
Left = 63
Top = 75
Width = 16
Height = 25
Hint = 'Click to change months'
Min = 1
Max = 150
ParentShowHint = False
Position = 12
ShowHint = True
TabOrder = 4
Wrap = False
OnClick = MonthCounterClick
end
object FutureDate: TPanel
Left = 194
Top = 79
Width = 70
Height = 20
BevelInner = bvLowered
Caption = 'Nov 1999'
Color = clSilver
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 5
end
object AltPledgeBtn: TButton
Left = 155
Top = 30
Width = 75
Height = 20
Hint = 'Click to change value'
Caption = '$0'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 6
OnClick = AltPledgeBtnClick
end
object AbortPanel: TPanel
Left = 13
Top = 105
Width = 252
Height = 20
BevelInner = bvLowered
Caption = '** Calculation Aborted by User **'
Color = clMaroon
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 7
Visible = False
end
end
object btnPayment: TBitBtn
Tag = 1
Left = 15
Top = 269
Width = 136
Height = 26
Hint = 'Print preview the Payment Schedule'
Caption = 'Payment Schedule'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 12
OnClick = btnPaymentClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F333333333333370FFFFFFF1F2F
1FF07FFFFFFFFFFFFFF70FFFFFFFFFFFFFF077777777777777770F4444444444
44F07F333333333333F70F888888888888F07F333333333337370FFFFFFFFFFF
FFF07FFFFFFFFFFFFFF7300000000000000337777777777777733330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
Margin = 2
NumGlyphs = 2
Spacing = -1
end
object btnBalance: TBitBtn
Left = 15
Top = 301
Width = 136
Height = 26
Hint = 'Print preview the Balance Report'
Caption = ' Balance Report '
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 13
OnClick = btnBalanceClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F333333333333370FFFFFFF1F2F
1FF07FFFFFFFFFFFFFF70FFFFFFFFFFFFFF077777777777777770F4444444444
44F07F333333333333F70F888888888888F07F333333333337370FFFFFFFFFFF
FFF07FFFFFFFFFFFFFF7300000000000000337777777777777733330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
Margin = 2
NumGlyphs = 2
Spacing = -1
end
object btnSummary: TBitBtn
Left = 15
Top = 333
Width = 136
Height = 26
Hint = 'Print preview the Payoff Summary Report'
Caption = ' Payoff Summary '
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 14
OnClick = btnSummaryClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F333333333333370FFFFFFF1F2F
1FF07FFFFFFFFFFFFFF70FFFFFFFFFFFFFF077777777777777770F4444444444
44F07F333333333333F70F888888888888F07F333333333337370FFFFFFFFFFF
FFF07FFFFFFFFFFFFFF7300000000000000337777777777777733330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
Margin = 2
NumGlyphs = 2
Spacing = -1
end
object btnBuilder: TBitBtn
Left = 15
Top = 365
Width = 136
Height = 26
Hint = 'Change the report settings'
Caption = 'Report Builder'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 15
OnClick = btnBuilderClick
Glyph.Data = {
BA040000424DBA04000000000000360000002800000016000000110000000100
18000000000084040000CE0E0000C40E00000000000000000000008080008080
0080800080800080800080800080800080800080800080800080800080800080
8000808000808000808000808000808000808000808000808000808000000080
8000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000008080
0000008080000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
000080800000008080000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFF0000000080800000008080000000FFFFFFFFFFFFFFFFFF000000000000FF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF
FFFFFFFFFFFF0000000080800000008080000000FFFFFFFFFFFFFFFFFFFFFFFF
000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFF0000000080800000008080000000FFFFFFFFFFFFFFFF
FFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF
FFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000080800000008080000000FFFFFFFF
FFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000000000000000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000080800000008080000000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF0000
00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000808000000080
80000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFF
FFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000008080
0000008080000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
000080800000008080000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
00000000FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFF0000000080800000008080000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFF000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000
0000000000000000000080800000008080000000FFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF0000
00FFFFFFFFFFFF0000000080800080800000008080000000FFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFF000000FFFFFF000000008080008080008080000000808000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000080800080800080800080800000008080008080
0080800080800080800080800080800080800080800080800080800080800080
800080800080800080800080800080800080800080800080800080800000}
Margin = 2
Spacing = -1
end
object cboxStrategy: TComboBox
Left = 234
Top = 209
Width = 204
Height = 21
Hint = 'Click to change Payoff Strategy'
TabStop = False
Style = csDropDownList
Ctl3D = True
DropDownCount = 10
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
Items.Strings = (
'Annual Percentage Rate'
'Quick Elimination'
'Custom Arrangement'
'Lowest Balance First'
'Highest Balance First'
'Lowest Payment First'
'Highest Payment First')
ParentCtl3D = False
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 16
OnChange = cboxStrategyChange
end
object btnPledgeCalc: TButton
Left = 381
Top = 406
Width = 75
Height = 27
Hint = 'Recalculates Accelerated Payoff'
Caption = 'Calculate'
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 17
OnClick = btnPledgeCalcClick
end
object btnAbortCalc: TBitBtn
Left = 294
Top = 406
Width = 75
Height = 27
Hint = 'Aborts the current calculation'
Caption = 'Abort'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 18
Visible = False
OnClick = btnAbortCalcClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
Margin = 0
NumGlyphs = 2
Spacing = -1
end
object btnTime: TButton
Left = 473
Top = 408
Width = 65
Height = 25
Hint = 'Show Time in Months'
Caption = 'Time'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 19
OnClick = BtnTimeClick
end
object btnInterest: TButton
Left = 554
Top = 408
Width = 65
Height = 25
Hint = 'Show Interest Cost'
Caption = 'Interest'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 20
OnClick = BtnInterestClick
end
end